3.19 \(\int \frac{c+d x}{\sqrt{b \tanh (e+f x)}} \, dx\)

Optimal. Leaf size=1280 \[ \text{result too large to display} \]

[Out]

-(((c + d*x)*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[-b]])/(Sqrt[-b]*f)) - (d*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[-b
]]^2)/(2*Sqrt[-b]*f^2) + ((c + d*x)*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[b]])/(Sqrt[b]*f) + (d*ArcTanh[Sqrt[b*Ta
nh[e + f*x]]/Sqrt[b]]^2)/(2*Sqrt[b]*f^2) - (d*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[b]]*Log[(2*Sqrt[b])/(Sqrt[b]
- Sqrt[b*Tanh[e + f*x]])])/(Sqrt[b]*f^2) + (d*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[b]]*Log[(2*Sqrt[b])/(Sqrt[b]
+ Sqrt[b*Tanh[e + f*x]])])/(Sqrt[b]*f^2) - (d*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[b]]*Log[(2*Sqrt[b]*(Sqrt[-b]
- Sqrt[b*Tanh[e + f*x]]))/((Sqrt[-b] - Sqrt[b])*(Sqrt[b] + Sqrt[b*Tanh[e + f*x]]))])/(2*Sqrt[b]*f^2) - (d*ArcT
anh[Sqrt[b*Tanh[e + f*x]]/Sqrt[b]]*Log[(2*Sqrt[b]*(Sqrt[-b] + Sqrt[b*Tanh[e + f*x]]))/((Sqrt[-b] + Sqrt[b])*(S
qrt[b] + Sqrt[b*Tanh[e + f*x]]))])/(2*Sqrt[b]*f^2) + (d*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[-b]]*Log[2/(1 - Sqr
t[b*Tanh[e + f*x]]/Sqrt[-b])])/(Sqrt[-b]*f^2) - (d*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[-b]]*Log[(2*(Sqrt[b] - S
qrt[b*Tanh[e + f*x]]))/((Sqrt[-b] + Sqrt[b])*(1 - Sqrt[b*Tanh[e + f*x]]/Sqrt[-b]))])/(2*Sqrt[-b]*f^2) - (d*Arc
Tanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[-b]]*Log[(-2*(Sqrt[b] + Sqrt[b*Tanh[e + f*x]]))/((Sqrt[-b] - Sqrt[b])*(1 - Sqr
t[b*Tanh[e + f*x]]/Sqrt[-b]))])/(2*Sqrt[-b]*f^2) - (d*ArcTanh[Sqrt[b*Tanh[e + f*x]]/Sqrt[-b]]*Log[2/(1 + Sqrt[
b*Tanh[e + f*x]]/Sqrt[-b])])/(Sqrt[-b]*f^2) - (d*PolyLog[2, 1 - (2*Sqrt[b])/(Sqrt[b] - Sqrt[b*Tanh[e + f*x]])]
)/(2*Sqrt[b]*f^2) - (d*PolyLog[2, 1 - (2*Sqrt[b])/(Sqrt[b] + Sqrt[b*Tanh[e + f*x]])])/(2*Sqrt[b]*f^2) + (d*Pol
yLog[2, 1 - (2*Sqrt[b]*(Sqrt[-b] - Sqrt[b*Tanh[e + f*x]]))/((Sqrt[-b] - Sqrt[b])*(Sqrt[b] + Sqrt[b*Tanh[e + f*
x]]))])/(4*Sqrt[b]*f^2) + (d*PolyLog[2, 1 - (2*Sqrt[b]*(Sqrt[-b] + Sqrt[b*Tanh[e + f*x]]))/((Sqrt[-b] + Sqrt[b
])*(Sqrt[b] + Sqrt[b*Tanh[e + f*x]]))])/(4*Sqrt[b]*f^2) + (d*PolyLog[2, 1 - 2/(1 - Sqrt[b*Tanh[e + f*x]]/Sqrt[
-b])])/(2*Sqrt[-b]*f^2) - (d*PolyLog[2, 1 - (2*(Sqrt[b] - Sqrt[b*Tanh[e + f*x]]))/((Sqrt[-b] + Sqrt[b])*(1 - S
qrt[b*Tanh[e + f*x]]/Sqrt[-b]))])/(4*Sqrt[-b]*f^2) - (d*PolyLog[2, 1 + (2*(Sqrt[b] + Sqrt[b*Tanh[e + f*x]]))/(
(Sqrt[-b] - Sqrt[b])*(1 - Sqrt[b*Tanh[e + f*x]]/Sqrt[-b]))])/(4*Sqrt[-b]*f^2) + (d*PolyLog[2, 1 - 2/(1 + Sqrt[
b*Tanh[e + f*x]]/Sqrt[-b])])/(2*Sqrt[-b]*f^2)

________________________________________________________________________________________

Rubi [F]  time = 0.0306645, antiderivative size = 0, normalized size of antiderivative = 0., number of steps used = 0, number of rules used = 0, integrand size = 0, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0., Rules used = {} \[ \int \frac{c+d x}{\sqrt{b \tanh (e+f x)}} \, dx \]

Verification is Not applicable to the result.

[In]

Int[(c + d*x)/Sqrt[b*Tanh[e + f*x]],x]

[Out]

Defer[Int][(c + d*x)/Sqrt[b*Tanh[e + f*x]], x]

Rubi steps

\begin{align*} \int \frac{c+d x}{\sqrt{b \tanh (e+f x)}} \, dx &=\int \frac{c+d x}{\sqrt{b \tanh (e+f x)}} \, dx\\ \end{align*}

Mathematica [C]  time = 4.24678, size = 556, normalized size = 0.43 \[ \frac{\sqrt{\tanh (e+f x)} \left (4 f (c+d x) \left (-\log \left (1-\sqrt{\tanh (e+f x)}\right )+\log \left (\sqrt{\tanh (e+f x)}+1\right )+2 \tan ^{-1}\left (\sqrt{\tanh (e+f x)}\right )\right )+d \left (-2 \text{PolyLog}\left (2,\frac{1}{2} \left (1-\sqrt{\tanh (e+f x)}\right )\right )+2 \text{PolyLog}\left (2,\left (-\frac{1}{2}-\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}-1\right )\right )+2 \text{PolyLog}\left (2,\left (-\frac{1}{2}+\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}-1\right )\right )+2 \text{PolyLog}\left (2,\frac{1}{2} \left (\sqrt{\tanh (e+f x)}+1\right )\right )-2 \text{PolyLog}\left (2,\left (\frac{1}{2}-\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}+1\right )\right )-2 \text{PolyLog}\left (2,\left (\frac{1}{2}+\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}+1\right )\right )-i \text{PolyLog}\left (2,-e^{4 i \tan ^{-1}\left (\sqrt{\tanh (e+f x)}\right )}\right )-\log ^2\left (1-\sqrt{\tanh (e+f x)}\right )+\log ^2\left (\sqrt{\tanh (e+f x)}+1\right )+2 \log \left (1-\sqrt{\tanh (e+f x)}\right ) \log \left (\left (\frac{1}{2}+\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}-i\right )\right )+2 \log \left (1-\sqrt{\tanh (e+f x)}\right ) \log \left (\left (\frac{1}{2}-\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}+i\right )\right )-2 \log \left (1-\sqrt{\tanh (e+f x)}\right ) \log \left (\frac{1}{2} \left (\sqrt{\tanh (e+f x)}+1\right )\right )-2 \log \left (1-\left (\frac{1}{2}-\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}+1\right )\right ) \log \left (\sqrt{\tanh (e+f x)}+1\right )+2 \log \left (\frac{1}{2} \left (1-\sqrt{\tanh (e+f x)}\right )\right ) \log \left (\sqrt{\tanh (e+f x)}+1\right )-2 \log \left (\left (-\frac{1}{2}-\frac{i}{2}\right ) \left (\sqrt{\tanh (e+f x)}+i\right )\right ) \log \left (\sqrt{\tanh (e+f x)}+1\right )-4 i \tan ^{-1}\left (\sqrt{\tanh (e+f x)}\right )^2+4 \tan ^{-1}\left (\sqrt{\tanh (e+f x)}\right ) \log \left (1+e^{4 i \tan ^{-1}\left (\sqrt{\tanh (e+f x)}\right )}\right )\right )\right )}{8 f^2 \sqrt{b \tanh (e+f x)}} \]

Warning: Unable to verify antiderivative.

[In]

Integrate[(c + d*x)/Sqrt[b*Tanh[e + f*x]],x]

[Out]

((4*f*(c + d*x)*(2*ArcTan[Sqrt[Tanh[e + f*x]]] - Log[1 - Sqrt[Tanh[e + f*x]]] + Log[1 + Sqrt[Tanh[e + f*x]]])
+ d*((-4*I)*ArcTan[Sqrt[Tanh[e + f*x]]]^2 + 4*ArcTan[Sqrt[Tanh[e + f*x]]]*Log[1 + E^((4*I)*ArcTan[Sqrt[Tanh[e
+ f*x]]])] - Log[1 - Sqrt[Tanh[e + f*x]]]^2 + 2*Log[1 - Sqrt[Tanh[e + f*x]]]*Log[(1/2 + I/2)*(-I + Sqrt[Tanh[e
+ f*x]])] + 2*Log[1 - Sqrt[Tanh[e + f*x]]]*Log[(1/2 - I/2)*(I + Sqrt[Tanh[e + f*x]])] - 2*Log[1 - Sqrt[Tanh[e
+ f*x]]]*Log[(1 + Sqrt[Tanh[e + f*x]])/2] - 2*Log[1 - (1/2 - I/2)*(1 + Sqrt[Tanh[e + f*x]])]*Log[1 + Sqrt[Tan
h[e + f*x]]] + 2*Log[(1 - Sqrt[Tanh[e + f*x]])/2]*Log[1 + Sqrt[Tanh[e + f*x]]] - 2*Log[(-1/2 - I/2)*(I + Sqrt[
Tanh[e + f*x]])]*Log[1 + Sqrt[Tanh[e + f*x]]] + Log[1 + Sqrt[Tanh[e + f*x]]]^2 - I*PolyLog[2, -E^((4*I)*ArcTan
[Sqrt[Tanh[e + f*x]]])] - 2*PolyLog[2, (1 - Sqrt[Tanh[e + f*x]])/2] + 2*PolyLog[2, (-1/2 - I/2)*(-1 + Sqrt[Tan
h[e + f*x]])] + 2*PolyLog[2, (-1/2 + I/2)*(-1 + Sqrt[Tanh[e + f*x]])] + 2*PolyLog[2, (1 + Sqrt[Tanh[e + f*x]])
/2] - 2*PolyLog[2, (1/2 - I/2)*(1 + Sqrt[Tanh[e + f*x]])] - 2*PolyLog[2, (1/2 + I/2)*(1 + Sqrt[Tanh[e + f*x]])
]))*Sqrt[Tanh[e + f*x]])/(8*f^2*Sqrt[b*Tanh[e + f*x]])

________________________________________________________________________________________

Maple [F]  time = 0.086, size = 0, normalized size = 0. \begin{align*} \int{(dx+c){\frac{1}{\sqrt{b\tanh \left ( fx+e \right ) }}}}\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((d*x+c)/(b*tanh(f*x+e))^(1/2),x)

[Out]

int((d*x+c)/(b*tanh(f*x+e))^(1/2),x)

________________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{d x + c}{\sqrt{b \tanh \left (f x + e\right )}}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((d*x+c)/(b*tanh(f*x+e))^(1/2),x, algorithm="maxima")

[Out]

integrate((d*x + c)/sqrt(b*tanh(f*x + e)), x)

________________________________________________________________________________________

Fricas [F(-2)]  time = 0., size = 0, normalized size = 0. \begin{align*} \text{Exception raised: UnboundLocalError} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((d*x+c)/(b*tanh(f*x+e))^(1/2),x, algorithm="fricas")

[Out]

Exception raised: UnboundLocalError

________________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{c + d x}{\sqrt{b \tanh{\left (e + f x \right )}}}\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((d*x+c)/(b*tanh(f*x+e))**(1/2),x)

[Out]

Integral((c + d*x)/sqrt(b*tanh(e + f*x)), x)

________________________________________________________________________________________

Giac [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{d x + c}{\sqrt{b \tanh \left (f x + e\right )}}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((d*x+c)/(b*tanh(f*x+e))^(1/2),x, algorithm="giac")

[Out]

integrate((d*x + c)/sqrt(b*tanh(f*x + e)), x)